home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Environments / RAMSES 2.2 / RAMSES 2.2 Extras / AuxLibExtra .DEF / MatAri.DEF next >
Encoding:
Modula Definition  |  1996-06-21  |  1.5 KB  |  50 lines  |  [TEXT/MEDT]
  1. DEFINITION MODULE MatAri;
  2.  
  3.   (*******************************************************************
  4.  
  5.     Module  MatAri     (Version 1.0)
  6.  
  7.               Copyright ©1993 by Olivier Roth, Andreas Fischlin, 
  8.               and Swiss Federal Institute of Technology Zürich ETHZ 
  9.  
  10.       Purpose: procedures from this module provide arithmetic operations
  11.                on parts or complete matrices.
  12.  
  13.       Remarks: This modulde is part of the Mat-library, which forms 
  14.                  part of the RAMSES package.
  15.               
  16.       Programming
  17.           o Design and Implementation
  18.               O. Roth                 23.04.90
  19.               A. Fischlin            28/Mai/93
  20.               
  21.           Systems Ecology Group
  22.           Swiss Federal Institute of Technology Zurich ETHZ
  23.           Department of Environmental Sciences
  24.           Grabenstr. 3
  25.           CH-8952 Schlieren/Zurich
  26.           Switzerland
  27.  
  28.           Last revision of definition:  28/Mai/93 af
  29.  
  30.   *******************************************************************)
  31.  
  32.   FROM Matrices IMPORT Matrix, Selection;
  33.  
  34.  
  35.   TYPE
  36.     Operation = ( add, sub, mul, div, inv, ln, exp, sqr, sqrt, power,
  37.                   trunc, round, fract, min, max,
  38.                   sin, cos, tan, arcSin, arcCos, arcTan );
  39.  
  40.  
  41.   PROCEDURE DoAriWithMatrix( a: Matrix;  area: Selection;
  42.                              ops: Operation;  x: REAL );
  43.  
  44.  
  45.   PROCEDURE SeriesMat( a: Matrix;  area: Selection; byRows: BOOLEAN;
  46.                        base, step: REAL );
  47.  
  48.  
  49. END MatAri.
  50.